3.10 \(\int \frac {\sqrt {a} \sqrt {b}-b x^2}{a+b x^4} \, dx\)

Optimal. Leaf size=106 \[ \frac {\sqrt [4]{b} \log \left (\sqrt {2} \sqrt [4]{a} \sqrt [4]{b} x+\sqrt {a}+\sqrt {b} x^2\right )}{2 \sqrt {2} \sqrt [4]{a}}-\frac {\sqrt [4]{b} \log \left (-\sqrt {2} \sqrt [4]{a} \sqrt [4]{b} x+\sqrt {a}+\sqrt {b} x^2\right )}{2 \sqrt {2} \sqrt [4]{a}} \]

[Out]

-1/4*b^(1/4)*ln(-a^(1/4)*b^(1/4)*x*2^(1/2)+a^(1/2)+x^2*b^(1/2))/a^(1/4)*2^(1/2)+1/4*b^(1/4)*ln(a^(1/4)*b^(1/4)
*x*2^(1/2)+a^(1/2)+x^2*b^(1/2))/a^(1/4)*2^(1/2)

________________________________________________________________________________________

Rubi [A]  time = 0.05, antiderivative size = 106, normalized size of antiderivative = 1.00, number of steps used = 3, number of rules used = 2, integrand size = 28, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.071, Rules used = {1165, 628} \[ \frac {\sqrt [4]{b} \log \left (\sqrt {2} \sqrt [4]{a} \sqrt [4]{b} x+\sqrt {a}+\sqrt {b} x^2\right )}{2 \sqrt {2} \sqrt [4]{a}}-\frac {\sqrt [4]{b} \log \left (-\sqrt {2} \sqrt [4]{a} \sqrt [4]{b} x+\sqrt {a}+\sqrt {b} x^2\right )}{2 \sqrt {2} \sqrt [4]{a}} \]

Antiderivative was successfully verified.

[In]

Int[(Sqrt[a]*Sqrt[b] - b*x^2)/(a + b*x^4),x]

[Out]

-(b^(1/4)*Log[Sqrt[a] - Sqrt[2]*a^(1/4)*b^(1/4)*x + Sqrt[b]*x^2])/(2*Sqrt[2]*a^(1/4)) + (b^(1/4)*Log[Sqrt[a] +
Sqrt[2]*a^(1/4)*b^(1/4)*x + Sqrt[b]*x^2])/(2*Sqrt[2]*a^(1/4))

Rule 628

Int[((d_) + (e_.)*(x_))/((a_.) + (b_.)*(x_) + (c_.)*(x_)^2), x_Symbol] :> Simp[(d*Log[RemoveContent[a + b*x +
c*x^2, x]])/b, x] /; FreeQ[{a, b, c, d, e}, x] && EqQ[2*c*d - b*e, 0]

Rule 1165

Int[((d_) + (e_.)*(x_)^2)/((a_) + (c_.)*(x_)^4), x_Symbol] :> With[{q = Rt[(-2*d)/e, 2]}, Dist[e/(2*c*q), Int[
(q - 2*x)/Simp[d/e + q*x - x^2, x], x], x] + Dist[e/(2*c*q), Int[(q + 2*x)/Simp[d/e - q*x - x^2, x], x], x]] /
; FreeQ[{a, c, d, e}, x] && EqQ[c*d^2 - a*e^2, 0] && NegQ[d*e]

Rubi steps

\begin {align*} \int \frac {\sqrt {a} \sqrt {b}-b x^2}{a+b x^4} \, dx &=-\frac {\sqrt [4]{b} \int \frac {\frac {\sqrt {2} \sqrt [4]{a}}{\sqrt [4]{b}}+2 x}{-\frac {\sqrt {a}}{\sqrt {b}}-\frac {\sqrt {2} \sqrt [4]{a} x}{\sqrt [4]{b}}-x^2} \, dx}{2 \sqrt {2} \sqrt [4]{a}}-\frac {\sqrt [4]{b} \int \frac {\frac {\sqrt {2} \sqrt [4]{a}}{\sqrt [4]{b}}-2 x}{-\frac {\sqrt {a}}{\sqrt {b}}+\frac {\sqrt {2} \sqrt [4]{a} x}{\sqrt [4]{b}}-x^2} \, dx}{2 \sqrt {2} \sqrt [4]{a}}\\ &=-\frac {\sqrt [4]{b} \log \left (\sqrt {a}-\sqrt {2} \sqrt [4]{a} \sqrt [4]{b} x+\sqrt {b} x^2\right )}{2 \sqrt {2} \sqrt [4]{a}}+\frac {\sqrt [4]{b} \log \left (\sqrt {a}+\sqrt {2} \sqrt [4]{a} \sqrt [4]{b} x+\sqrt {b} x^2\right )}{2 \sqrt {2} \sqrt [4]{a}}\\ \end {align*}

________________________________________________________________________________________

Mathematica [A]  time = 0.02, size = 91, normalized size = 0.86 \[ \frac {\sqrt [4]{b} \left (\log \left (\sqrt {2} \sqrt [4]{a} \sqrt [4]{b} x+\sqrt {a}+\sqrt {b} x^2\right )-\log \left (\sqrt {2} \sqrt [4]{a} \sqrt [4]{b} x-\sqrt {a}-\sqrt {b} x^2\right )\right )}{2 \sqrt {2} \sqrt [4]{a}} \]

Antiderivative was successfully verified.

[In]

Integrate[(Sqrt[a]*Sqrt[b] - b*x^2)/(a + b*x^4),x]

[Out]

(b^(1/4)*(-Log[-Sqrt[a] + Sqrt[2]*a^(1/4)*b^(1/4)*x - Sqrt[b]*x^2] + Log[Sqrt[a] + Sqrt[2]*a^(1/4)*b^(1/4)*x +
Sqrt[b]*x^2]))/(2*Sqrt[2]*a^(1/4))

________________________________________________________________________________________

fricas [A]  time = 0.46, size = 151, normalized size = 1.42 \[ \left [\frac {1}{2} \, \sqrt {\frac {1}{2}} \sqrt {\frac {\sqrt {b}}{\sqrt {a}}} \log \left (\frac {b x^{4} + 4 \, \sqrt {a} \sqrt {b} x^{2} + 4 \, \sqrt {\frac {1}{2}} {\left (\sqrt {a} \sqrt {b} x^{3} + a x\right )} \sqrt {\frac {\sqrt {b}}{\sqrt {a}}} + a}{b x^{4} + a}\right ), -\sqrt {\frac {1}{2}} \sqrt {-\frac {\sqrt {b}}{\sqrt {a}}} \arctan \left (\sqrt {\frac {1}{2}} x \sqrt {-\frac {\sqrt {b}}{\sqrt {a}}}\right ) + \sqrt {\frac {1}{2}} \sqrt {-\frac {\sqrt {b}}{\sqrt {a}}} \arctan \left (\frac {\sqrt {\frac {1}{2}} {\left (\sqrt {a} \sqrt {b} x^{3} - a x\right )} \sqrt {-\frac {\sqrt {b}}{\sqrt {a}}}}{a}\right )\right ] \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((-b*x^2+a^(1/2)*b^(1/2))/(b*x^4+a),x, algorithm="fricas")

[Out]

[1/2*sqrt(1/2)*sqrt(sqrt(b)/sqrt(a))*log((b*x^4 + 4*sqrt(a)*sqrt(b)*x^2 + 4*sqrt(1/2)*(sqrt(a)*sqrt(b)*x^3 + a
*x)*sqrt(sqrt(b)/sqrt(a)) + a)/(b*x^4 + a)), -sqrt(1/2)*sqrt(-sqrt(b)/sqrt(a))*arctan(sqrt(1/2)*x*sqrt(-sqrt(b
)/sqrt(a))) + sqrt(1/2)*sqrt(-sqrt(b)/sqrt(a))*arctan(sqrt(1/2)*(sqrt(a)*sqrt(b)*x^3 - a*x)*sqrt(-sqrt(b)/sqrt
(a))/a)]

________________________________________________________________________________________

giac [F(-2)]  time = 0.00, size = 0, normalized size = 0.00 \[ \text {Exception raised: TypeError} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((-b*x^2+a^(1/2)*b^(1/2))/(b*x^4+a),x, algorithm="giac")

[Out]

Exception raised: TypeError >> An error occurred running a Giac command:INPUT:sage2:=int(sage0,x):;OUTPUT:sym2
poly/r2sym(const gen & e,const index_m & i,const vecteur & l) Error: Bad Argument Value

________________________________________________________________________________________

maple [B]  time = 0.00, size = 254, normalized size = 2.40 \[ \frac {\left (\frac {a}{b}\right )^{\frac {1}{4}} \sqrt {2}\, \sqrt {b}\, \arctan \left (\frac {\sqrt {2}\, x}{\left (\frac {a}{b}\right )^{\frac {1}{4}}}-1\right )}{4 \sqrt {a}}+\frac {\left (\frac {a}{b}\right )^{\frac {1}{4}} \sqrt {2}\, \sqrt {b}\, \arctan \left (\frac {\sqrt {2}\, x}{\left (\frac {a}{b}\right )^{\frac {1}{4}}}+1\right )}{4 \sqrt {a}}+\frac {\left (\frac {a}{b}\right )^{\frac {1}{4}} \sqrt {2}\, \sqrt {b}\, \ln \left (\frac {x^{2}+\left (\frac {a}{b}\right )^{\frac {1}{4}} \sqrt {2}\, x +\sqrt {\frac {a}{b}}}{x^{2}-\left (\frac {a}{b}\right )^{\frac {1}{4}} \sqrt {2}\, x +\sqrt {\frac {a}{b}}}\right )}{8 \sqrt {a}}-\frac {\sqrt {2}\, \arctan \left (\frac {\sqrt {2}\, x}{\left (\frac {a}{b}\right )^{\frac {1}{4}}}-1\right )}{4 \left (\frac {a}{b}\right )^{\frac {1}{4}}}-\frac {\sqrt {2}\, \arctan \left (\frac {\sqrt {2}\, x}{\left (\frac {a}{b}\right )^{\frac {1}{4}}}+1\right )}{4 \left (\frac {a}{b}\right )^{\frac {1}{4}}}-\frac {\sqrt {2}\, \ln \left (\frac {x^{2}-\left (\frac {a}{b}\right )^{\frac {1}{4}} \sqrt {2}\, x +\sqrt {\frac {a}{b}}}{x^{2}+\left (\frac {a}{b}\right )^{\frac {1}{4}} \sqrt {2}\, x +\sqrt {\frac {a}{b}}}\right )}{8 \left (\frac {a}{b}\right )^{\frac {1}{4}}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int((-b*x^2+a^(1/2)*b^(1/2))/(b*x^4+a),x)

[Out]

1/8*(a/b)^(1/4)*2^(1/2)/a^(1/2)*b^(1/2)*ln((x^2+(a/b)^(1/4)*2^(1/2)*x+(a/b)^(1/2))/(x^2-(a/b)^(1/4)*2^(1/2)*x+
(a/b)^(1/2)))+1/4*(a/b)^(1/4)*2^(1/2)/a^(1/2)*b^(1/2)*arctan(2^(1/2)/(a/b)^(1/4)*x+1)+1/4*(a/b)^(1/4)*2^(1/2)/
a^(1/2)*b^(1/2)*arctan(2^(1/2)/(a/b)^(1/4)*x-1)-1/8/(a/b)^(1/4)*2^(1/2)*ln((x^2-(a/b)^(1/4)*2^(1/2)*x+(a/b)^(1
/2))/(x^2+(a/b)^(1/4)*2^(1/2)*x+(a/b)^(1/2)))-1/4/(a/b)^(1/4)*2^(1/2)*arctan(2^(1/2)/(a/b)^(1/4)*x+1)-1/4/(a/b
)^(1/4)*2^(1/2)*arctan(2^(1/2)/(a/b)^(1/4)*x-1)

________________________________________________________________________________________

maxima [A]  time = 2.37, size = 70, normalized size = 0.66 \[ \frac {\sqrt {2} b^{\frac {1}{4}} \log \left (\sqrt {b} x^{2} + \sqrt {2} a^{\frac {1}{4}} b^{\frac {1}{4}} x + \sqrt {a}\right )}{4 \, a^{\frac {1}{4}}} - \frac {\sqrt {2} b^{\frac {1}{4}} \log \left (\sqrt {b} x^{2} - \sqrt {2} a^{\frac {1}{4}} b^{\frac {1}{4}} x + \sqrt {a}\right )}{4 \, a^{\frac {1}{4}}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((-b*x^2+a^(1/2)*b^(1/2))/(b*x^4+a),x, algorithm="maxima")

[Out]

1/4*sqrt(2)*b^(1/4)*log(sqrt(b)*x^2 + sqrt(2)*a^(1/4)*b^(1/4)*x + sqrt(a))/a^(1/4) - 1/4*sqrt(2)*b^(1/4)*log(s
qrt(b)*x^2 - sqrt(2)*a^(1/4)*b^(1/4)*x + sqrt(a))/a^(1/4)

________________________________________________________________________________________

mupad [B]  time = 4.76, size = 43, normalized size = 0.41 \[ \frac {\sqrt {2}\,b^{1/4}\,\mathrm {atanh}\left (\frac {2\,\sqrt {2}\,a^{1/4}\,b^{11/4}\,x}{2\,\sqrt {a}\,b^{5/2}+2\,b^3\,x^2}\right )}{2\,a^{1/4}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(-(b*x^2 - a^(1/2)*b^(1/2))/(a + b*x^4),x)

[Out]

(2^(1/2)*b^(1/4)*atanh((2*2^(1/2)*a^(1/4)*b^(11/4)*x)/(2*a^(1/2)*b^(5/2) + 2*b^3*x^2)))/(2*a^(1/4))

________________________________________________________________________________________

sympy [A]  time = 0.46, size = 131, normalized size = 1.24 \[ - \frac {\sqrt {2} \sqrt {\frac {\sqrt {b}}{\sqrt {a}}} \log {\left (- \frac {\sqrt {2} \sqrt {a} x \sqrt {\frac {\sqrt {b}}{\sqrt {a}}}}{\sqrt {b}} + \frac {\sqrt {a}}{\sqrt {b}} + x^{2} \right )}}{4} + \frac {\sqrt {2} \sqrt {\frac {\sqrt {b}}{\sqrt {a}}} \log {\left (\frac {\sqrt {2} \sqrt {a} x \sqrt {\frac {\sqrt {b}}{\sqrt {a}}}}{\sqrt {b}} + \frac {\sqrt {a}}{\sqrt {b}} + x^{2} \right )}}{4} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((-b*x**2+a**(1/2)*b**(1/2))/(b*x**4+a),x)

[Out]

-sqrt(2)*sqrt(sqrt(b)/sqrt(a))*log(-sqrt(2)*sqrt(a)*x*sqrt(sqrt(b)/sqrt(a))/sqrt(b) + sqrt(a)/sqrt(b) + x**2)/
4 + sqrt(2)*sqrt(sqrt(b)/sqrt(a))*log(sqrt(2)*sqrt(a)*x*sqrt(sqrt(b)/sqrt(a))/sqrt(b) + sqrt(a)/sqrt(b) + x**2
)/4

________________________________________________________________________________________